home *** CD-ROM | disk | FTP | other *** search
/ Delphi 2 - Developers' Solutions / Delphi 2 Developers' Solutions.iso / dds / chap07 / howto02 / database / clients.qbe < prev    next >
Encoding:
Text File  |  1995-09-17  |  754 b   |  21 lines
  1. Query
  2. ANSWER: :PRIV:ANSWER.DB
  3.  
  4. CLIENT.DB | CLIENT_ID             | CLIENT_TYPE | PHONE_NUMBER | 
  5.           | Check _join1!, _join3 | 1           | Check        | 
  6.           | Check _join2!, _join4 | 2           | Check        | 
  7.  
  8. PERSON.DB | CLIENT_ID                                                          | 
  9.           | _join3, Calc _First + " " + _Last + _CompanyBlank AS "CLIENT_NAME" | 
  10.           | _join2, Calc _FirstBlank + _LastBlank + _Company AS "CLIENT_NAME"  | 
  11.  
  12. PERSON.DB | FIRST_NAME  | LAST_NAME  | 
  13.           | _First      | _Last      | 
  14.           | _FirstBlank | _LastBlank | 
  15.  
  16. COMPANY.DB | CLIENT_ID | COMPANY_NAME  | 
  17.            | _join4    | _Company      | 
  18.            | _join1    | _CompanyBlank | 
  19.  
  20. EndQuery
  21.